Public Class ReporteProyeccionDeIngresos

    Private Sub ReporteProyeccionDeIngresos_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim rep As New CachedCrystalReport8

        Me.CrystalReportViewer1.ReportSource = rep

    End Sub
End Class